﻿Public Class Formulaire
    Public Id As Integer
    Public Nom As String
    Public legende As String

    'les constructeur --------------------------
    Sub New(ByVal id As Integer, ByVal nom As String, ByVal droit As String)
        Me.Id = id
        Me.Nom = nom
        Me.legende = droit
    End Sub
    Sub New()

    End Sub

    'les listes ------------------------------



    'les fonctions ------------------------
End Class
